\(\int \frac {(c i+d i x) (A+B \log (e (\frac {a+b x}{c+d x})^n))}{(a g+b g x)^5} \, dx\) [116]

Optimal result

Integrand size = 41, antiderivative size = 281 \[ \int \frac {(c i+d i x) \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{(a g+b g x)^5} \, dx=-\frac {B d^2 i n (c+d x)^2}{4 (b c-a d)^3 g^5 (a+b x)^2}+\frac {2 b B d i n (c+d x)^3}{9 (b c-a d)^3 g^5 (a+b x)^3}-\frac {b^2 B i n (c+d x)^4}{16 (b c-a d)^3 g^5 (a+b x)^4}-\frac {d^2 i (c+d x)^2 \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{2 (b c-a d)^3 g^5 (a+b x)^2}+\frac {2 b d i (c+d x)^3 \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{3 (b c-a d)^3 g^5 (a+b x)^3}-\frac {b^2 i (c+d x)^4 \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{4 (b c-a d)^3 g^5 (a+b x)^4} \]

[Out]

-1/4*B*d^2*i*n*(d*x+c)^2/(-a*d+b*c)^3/g^5/(b*x+a)^2+2/9*b*B*d*i*n*(d*x+c)^3/(-a*d+b*c)^3/g^5/(b*x+a)^3-1/16*b^
2*B*i*n*(d*x+c)^4/(-a*d+b*c)^3/g^5/(b*x+a)^4-1/2*d^2*i*(d*x+c)^2*(A+B*ln(e*((b*x+a)/(d*x+c))^n))/(-a*d+b*c)^3/
g^5/(b*x+a)^2+2/3*b*d*i*(d*x+c)^3*(A+B*ln(e*((b*x+a)/(d*x+c))^n))/(-a*d+b*c)^3/g^5/(b*x+a)^3-1/4*b^2*i*(d*x+c)
^4*(A+B*ln(e*((b*x+a)/(d*x+c))^n))/(-a*d+b*c)^3/g^5/(b*x+a)^4

Rubi [A] (verified)

Time = 0.15 (sec) , antiderivative size = 281, normalized size of antiderivative = 1.00, number of steps used = 5, number of rules used = 5, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.122, Rules used = {2561, 45, 2372, 12, 14} \[ \int \frac {(c i+d i x) \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{(a g+b g x)^5} \, dx=-\frac {b^2 i (c+d x)^4 \left (B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )+A\right )}{4 g^5 (a+b x)^4 (b c-a d)^3}-\frac {d^2 i (c+d x)^2 \left (B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )+A\right )}{2 g^5 (a+b x)^2 (b c-a d)^3}+\frac {2 b d i (c+d x)^3 \left (B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )+A\right )}{3 g^5 (a+b x)^3 (b c-a d)^3}-\frac {b^2 B i n (c+d x)^4}{16 g^5 (a+b x)^4 (b c-a d)^3}-\frac {B d^2 i n (c+d x)^2}{4 g^5 (a+b x)^2 (b c-a d)^3}+\frac {2 b B d i n (c+d x)^3}{9 g^5 (a+b x)^3 (b c-a d)^3} \]

[In]

Int[((c*i + d*i*x)*(A + B*Log[e*((a + b*x)/(c + d*x))^n]))/(a*g + b*g*x)^5,x]

[Out]

-1/4*(B*d^2*i*n*(c + d*x)^2)/((b*c - a*d)^3*g^5*(a + b*x)^2) + (2*b*B*d*i*n*(c + d*x)^3)/(9*(b*c - a*d)^3*g^5*
(a + b*x)^3) - (b^2*B*i*n*(c + d*x)^4)/(16*(b*c - a*d)^3*g^5*(a + b*x)^4) - (d^2*i*(c + d*x)^2*(A + B*Log[e*((
a + b*x)/(c + d*x))^n]))/(2*(b*c - a*d)^3*g^5*(a + b*x)^2) + (2*b*d*i*(c + d*x)^3*(A + B*Log[e*((a + b*x)/(c +
d*x))^n]))/(3*(b*c - a*d)^3*g^5*(a + b*x)^3) - (b^2*i*(c + d*x)^4*(A + B*Log[e*((a + b*x)/(c + d*x))^n]))/(4*
(b*c - a*d)^3*g^5*(a + b*x)^4)

Rule 12

Int[(a_)*(u_), x_Symbol] :> Dist[a, Int[u, x], x] /; FreeQ[a, x] &&  !MatchQ[u, (b_)*(v_) /; FreeQ[b, x]]

Rule 14

Int[(u_)*((c_.)*(x_))^(m_.), x_Symbol] :> Int[ExpandIntegrand[(c*x)^m*u, x], x] /; FreeQ[{c, m}, x] && SumQ[u]
&&  !LinearQ[u, x] &&  !MatchQ[u, (a_) + (b_.)*(v_) /; FreeQ[{a, b}, x] && InverseFunctionQ[v]]

Rule 45

Int[((a_.) + (b_.)*(x_))^(m_.)*((c_.) + (d_.)*(x_))^(n_.), x_Symbol] :> Int[ExpandIntegrand[(a + b*x)^m*(c + d
*x)^n, x], x] /; FreeQ[{a, b, c, d, n}, x] && NeQ[b*c - a*d, 0] && IGtQ[m, 0] && ( !IntegerQ[n] || (EqQ[c, 0]
&& LeQ[7*m + 4*n + 4, 0]) || LtQ[9*m + 5*(n + 1), 0] || GtQ[m + n + 2, 0])

Rule 2372

Int[((a_.) + Log[(c_.)*(x_)^(n_.)]*(b_.))*(x_)^(m_.)*((d_) + (e_.)*(x_)^(r_.))^(q_.), x_Symbol] :> With[{u = I
ntHide[x^m*(d + e*x^r)^q, x]}, Dist[a + b*Log[c*x^n], u, x] - Dist[b*n, Int[SimplifyIntegrand[u/x, x], x], x]]
/; FreeQ[{a, b, c, d, e, n, r}, x] && IGtQ[q, 0] && IntegerQ[m] &&  !(EqQ[q, 1] && EqQ[m, -1])

Rule 2561

Int[((A_.) + Log[(e_.)*(((a_.) + (b_.)*(x_))/((c_.) + (d_.)*(x_)))^(n_.)]*(B_.))^(p_.)*((f_.) + (g_.)*(x_))^(m
_.)*((h_.) + (i_.)*(x_))^(q_.), x_Symbol] :> Dist[(b*c - a*d)^(m + q + 1)*(g/b)^m*(i/d)^q, Subst[Int[x^m*((A +
B*Log[e*x^n])^p/(b - d*x)^(m + q + 2)), x], x, (a + b*x)/(c + d*x)], x] /; FreeQ[{a, b, c, d, e, f, g, h, i,
A, B, n, p}, x] && NeQ[b*c - a*d, 0] && EqQ[b*f - a*g, 0] && EqQ[d*h - c*i, 0] && IntegersQ[m, q]

Rubi steps \begin{align*} \text {integral}& = \frac {i \text {Subst}\left (\int \frac {(b-d x)^2 \left (A+B \log \left (e x^n\right )\right )}{x^5} \, dx,x,\frac {a+b x}{c+d x}\right )}{(b c-a d)^3 g^5} \\ & = -\frac {d^2 i (c+d x)^2 \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{2 (b c-a d)^3 g^5 (a+b x)^2}+\frac {2 b d i (c+d x)^3 \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{3 (b c-a d)^3 g^5 (a+b x)^3}-\frac {b^2 i (c+d x)^4 \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{4 (b c-a d)^3 g^5 (a+b x)^4}-\frac {(B i n) \text {Subst}\left (\int \frac {-3 b^2+8 b d x-6 d^2 x^2}{12 x^5} \, dx,x,\frac {a+b x}{c+d x}\right )}{(b c-a d)^3 g^5} \\ & = -\frac {d^2 i (c+d x)^2 \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{2 (b c-a d)^3 g^5 (a+b x)^2}+\frac {2 b d i (c+d x)^3 \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{3 (b c-a d)^3 g^5 (a+b x)^3}-\frac {b^2 i (c+d x)^4 \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{4 (b c-a d)^3 g^5 (a+b x)^4}-\frac {(B i n) \text {Subst}\left (\int \frac {-3 b^2+8 b d x-6 d^2 x^2}{x^5} \, dx,x,\frac {a+b x}{c+d x}\right )}{12 (b c-a d)^3 g^5} \\ & = -\frac {d^2 i (c+d x)^2 \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{2 (b c-a d)^3 g^5 (a+b x)^2}+\frac {2 b d i (c+d x)^3 \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{3 (b c-a d)^3 g^5 (a+b x)^3}-\frac {b^2 i (c+d x)^4 \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{4 (b c-a d)^3 g^5 (a+b x)^4}-\frac {(B i n) \text {Subst}\left (\int \left (-\frac {3 b^2}{x^5}+\frac {8 b d}{x^4}-\frac {6 d^2}{x^3}\right ) \, dx,x,\frac {a+b x}{c+d x}\right )}{12 (b c-a d)^3 g^5} \\ & = -\frac {B d^2 i n (c+d x)^2}{4 (b c-a d)^3 g^5 (a+b x)^2}+\frac {2 b B d i n (c+d x)^3}{9 (b c-a d)^3 g^5 (a+b x)^3}-\frac {b^2 B i n (c+d x)^4}{16 (b c-a d)^3 g^5 (a+b x)^4}-\frac {d^2 i (c+d x)^2 \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{2 (b c-a d)^3 g^5 (a+b x)^2}+\frac {2 b d i (c+d x)^3 \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{3 (b c-a d)^3 g^5 (a+b x)^3}-\frac {b^2 i (c+d x)^4 \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{4 (b c-a d)^3 g^5 (a+b x)^4} \\ \end{align*}

Mathematica [A] (verified)

Time = 0.32 (sec) , antiderivative size = 220, normalized size of antiderivative = 0.78 \[ \int \frac {(c i+d i x) \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{(a g+b g x)^5} \, dx=-\frac {i \left (\frac {36 A b c}{(a+b x)^4}-\frac {36 a A d}{(a+b x)^4}+\frac {9 b B c n}{(a+b x)^4}-\frac {9 a B d n}{(a+b x)^4}+\frac {48 A d}{(a+b x)^3}+\frac {4 B d n}{(a+b x)^3}-\frac {6 B d^2 n}{(b c-a d) (a+b x)^2}+\frac {12 B d^3 n}{(b c-a d)^2 (a+b x)}+\frac {12 B d^4 n \log (a+b x)}{(b c-a d)^3}+\frac {12 B (3 b c+a d+4 b d x) \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )}{(a+b x)^4}-\frac {12 B d^4 n \log (c+d x)}{(b c-a d)^3}\right )}{144 b^2 g^5} \]

[In]

Integrate[((c*i + d*i*x)*(A + B*Log[e*((a + b*x)/(c + d*x))^n]))/(a*g + b*g*x)^5,x]

[Out]

-1/144*(i*((36*A*b*c)/(a + b*x)^4 - (36*a*A*d)/(a + b*x)^4 + (9*b*B*c*n)/(a + b*x)^4 - (9*a*B*d*n)/(a + b*x)^4
+ (48*A*d)/(a + b*x)^3 + (4*B*d*n)/(a + b*x)^3 - (6*B*d^2*n)/((b*c - a*d)*(a + b*x)^2) + (12*B*d^3*n)/((b*c -
a*d)^2*(a + b*x)) + (12*B*d^4*n*Log[a + b*x])/(b*c - a*d)^3 + (12*B*(3*b*c + a*d + 4*b*d*x)*Log[e*((a + b*x)/
(c + d*x))^n])/(a + b*x)^4 - (12*B*d^4*n*Log[c + d*x])/(b*c - a*d)^3))/(b^2*g^5)

Maple [B] (verified)

Leaf count of result is larger than twice the leaf count of optimal. \(985\) vs. \(2(269)=538\).

Time = 27.71 (sec) , antiderivative size = 986, normalized size of antiderivative = 3.51

method	result	size
parallelrisch	\(\frac {48 A \,x^{3} a^{7} b c \,d^{4} i n -288 A \,x^{3} a^{5} b^{3} c^{3} d^{2} i n -144 B x \ln \left (e \left (\frac {b x +a}{d x +c}\right )^{n}\right ) a^{7} b \,c^{3} d^{2} i n +48 B x \ln \left (e \left (\frac {b x +a}{d x +c}\right )^{n}\right ) a^{6} b^{2} c^{4} d i n +384 A \,x^{3} a^{4} b^{4} c^{4} d i n +72 B \,x^{2} \ln \left (e \left (\frac {b x +a}{d x +c}\right )^{n}\right ) a^{8} c \,d^{4} i n +48 B \,x^{2} a^{7} b \,c^{2} d^{3} i \,n^{2}-222 B \,x^{2} a^{6} b^{2} c^{3} d^{2} i \,n^{2}+192 B \,x^{2} a^{5} b^{3} c^{4} d i \,n^{2}-432 A \,x^{2} a^{6} b^{2} c^{3} d^{2} i n +576 A \,x^{2} a^{5} b^{3} c^{4} d i n +144 B x \ln \left (e \left (\frac {b x +a}{d x +c}\right )^{n}\right ) a^{8} c^{2} d^{3} i n -168 B x \,a^{7} b \,c^{3} d^{2} i \,n^{2}+132 B x \,a^{6} b^{2} c^{4} d i \,n^{2}-432 A x \,a^{7} b \,c^{3} d^{2} i n +432 A x \,a^{6} b^{2} c^{4} d i n -96 B \ln \left (e \left (\frac {b x +a}{d x +c}\right )^{n}\right ) a^{7} b \,c^{4} d i n +12 B \,x^{4} \ln \left (e \left (\frac {b x +a}{d x +c}\right )^{n}\right ) a^{6} b^{2} c \,d^{4} i n +48 B \,x^{3} \ln \left (e \left (\frac {b x +a}{d x +c}\right )^{n}\right ) a^{7} b c \,d^{4} i n +13 B \,x^{4} a^{6} b^{2} c \,d^{4} i \,n^{2}-36 B \,x^{4} a^{4} b^{4} c^{3} d^{2} i \,n^{2}+32 B \,x^{4} a^{3} b^{5} c^{4} d i \,n^{2}+12 A \,x^{4} a^{6} b^{2} c \,d^{4} i n -72 A \,x^{4} a^{4} b^{4} c^{3} d^{2} i n +96 A \,x^{4} a^{3} b^{5} c^{4} d i n +40 B \,x^{3} a^{7} b c \,d^{4} i \,n^{2}+12 B \,x^{3} a^{6} b^{2} c^{2} d^{3} i \,n^{2}-144 B \,x^{3} a^{5} b^{3} c^{3} d^{2} i \,n^{2}+128 B \,x^{3} a^{4} b^{4} c^{4} d i \,n^{2}-9 B \,x^{4} a^{2} b^{6} c^{5} i \,n^{2}-36 A \,x^{4} a^{2} b^{6} c^{5} i n -36 B \,x^{3} a^{3} b^{5} c^{5} i \,n^{2}-144 A \,x^{3} a^{3} b^{5} c^{5} i n +36 B \,x^{2} a^{8} c \,d^{4} i \,n^{2}-54 B \,x^{2} a^{4} b^{4} c^{5} i \,n^{2}+72 A \,x^{2} a^{8} c \,d^{4} i n -216 A \,x^{2} a^{4} b^{4} c^{5} i n +72 B x \,a^{8} c^{2} d^{3} i \,n^{2}-36 B x \,a^{5} b^{3} c^{5} i \,n^{2}+144 A x \,a^{8} c^{2} d^{3} i n -144 A x \,a^{5} b^{3} c^{5} i n +72 B \ln \left (e \left (\frac {b x +a}{d x +c}\right )^{n}\right ) a^{8} c^{3} d^{2} i n +36 B \ln \left (e \left (\frac {b x +a}{d x +c}\right )^{n}\right ) a^{6} b^{2} c^{5} i n}{144 g^{5} \left (b x +a \right )^{4} n \left (a^{3} d^{3}-3 a^{2} b c \,d^{2}+3 a \,b^{2} c^{2} d -b^{3} c^{3}\right ) a^{6} c}\)	\(986\)

[In]

int((d*i*x+c*i)*(A+B*ln(e*((b*x+a)/(d*x+c))^n))/(b*g*x+a*g)^5,x,method=_RETURNVERBOSE)

[Out]

1/144*(48*A*x^3*a^7*b*c*d^4*i*n-288*A*x^3*a^5*b^3*c^3*d^2*i*n-144*B*x*ln(e*((b*x+a)/(d*x+c))^n)*a^7*b*c^3*d^2*
i*n+48*B*x*ln(e*((b*x+a)/(d*x+c))^n)*a^6*b^2*c^4*d*i*n+384*A*x^3*a^4*b^4*c^4*d*i*n+72*B*x^2*ln(e*((b*x+a)/(d*x
+c))^n)*a^8*c*d^4*i*n+48*B*x^2*a^7*b*c^2*d^3*i*n^2-222*B*x^2*a^6*b^2*c^3*d^2*i*n^2+192*B*x^2*a^5*b^3*c^4*d*i*n
^2-432*A*x^2*a^6*b^2*c^3*d^2*i*n+576*A*x^2*a^5*b^3*c^4*d*i*n+144*B*x*ln(e*((b*x+a)/(d*x+c))^n)*a^8*c^2*d^3*i*n
-168*B*x*a^7*b*c^3*d^2*i*n^2+132*B*x*a^6*b^2*c^4*d*i*n^2-432*A*x*a^7*b*c^3*d^2*i*n+432*A*x*a^6*b^2*c^4*d*i*n-9
6*B*ln(e*((b*x+a)/(d*x+c))^n)*a^7*b*c^4*d*i*n+12*B*x^4*ln(e*((b*x+a)/(d*x+c))^n)*a^6*b^2*c*d^4*i*n+48*B*x^3*ln
(e*((b*x+a)/(d*x+c))^n)*a^7*b*c*d^4*i*n+13*B*x^4*a^6*b^2*c*d^4*i*n^2-36*B*x^4*a^4*b^4*c^3*d^2*i*n^2+32*B*x^4*a
^3*b^5*c^4*d*i*n^2+12*A*x^4*a^6*b^2*c*d^4*i*n-72*A*x^4*a^4*b^4*c^3*d^2*i*n+96*A*x^4*a^3*b^5*c^4*d*i*n+40*B*x^3
*a^7*b*c*d^4*i*n^2+12*B*x^3*a^6*b^2*c^2*d^3*i*n^2-144*B*x^3*a^5*b^3*c^3*d^2*i*n^2+128*B*x^3*a^4*b^4*c^4*d*i*n^
2-9*B*x^4*a^2*b^6*c^5*i*n^2-36*A*x^4*a^2*b^6*c^5*i*n-36*B*x^3*a^3*b^5*c^5*i*n^2-144*A*x^3*a^3*b^5*c^5*i*n+36*B
*x^2*a^8*c*d^4*i*n^2-54*B*x^2*a^4*b^4*c^5*i*n^2+72*A*x^2*a^8*c*d^4*i*n-216*A*x^2*a^4*b^4*c^5*i*n+72*B*x*a^8*c^
2*d^3*i*n^2-36*B*x*a^5*b^3*c^5*i*n^2+144*A*x*a^8*c^2*d^3*i*n-144*A*x*a^5*b^3*c^5*i*n+72*B*ln(e*((b*x+a)/(d*x+c
))^n)*a^8*c^3*d^2*i*n+36*B*ln(e*((b*x+a)/(d*x+c))^n)*a^6*b^2*c^5*i*n)/g^5/(b*x+a)^4/n/(a^3*d^3-3*a^2*b*c*d^2+3
*a*b^2*c^2*d-b^3*c^3)/a^6/c

Fricas [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 773 vs. \(2 (269) = 538\).

Time = 0.35 (sec) , antiderivative size = 773, normalized size of antiderivative = 2.75 \[ \int \frac {(c i+d i x) \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{(a g+b g x)^5} \, dx=-\frac {12 \, {\left (B b^{4} c d^{3} - B a b^{3} d^{4}\right )} i n x^{3} - 6 \, {\left (B b^{4} c^{2} d^{2} - 8 \, B a b^{3} c d^{3} + 7 \, B a^{2} b^{2} d^{4}\right )} i n x^{2} + {\left (9 \, B b^{4} c^{4} - 32 \, B a b^{3} c^{3} d + 36 \, B a^{2} b^{2} c^{2} d^{2} - 13 \, B a^{4} d^{4}\right )} i n + 12 \, {\left (3 \, A b^{4} c^{4} - 8 \, A a b^{3} c^{3} d + 6 \, A a^{2} b^{2} c^{2} d^{2} - A a^{4} d^{4}\right )} i + 4 \, {\left ({\left (B b^{4} c^{3} d - 6 \, B a b^{3} c^{2} d^{2} + 18 \, B a^{2} b^{2} c d^{3} - 13 \, B a^{3} b d^{4}\right )} i n + 12 \, {\left (A b^{4} c^{3} d - 3 \, A a b^{3} c^{2} d^{2} + 3 \, A a^{2} b^{2} c d^{3} - A a^{3} b d^{4}\right )} i\right )} x + 12 \, {\left (4 \, {\left (B b^{4} c^{3} d - 3 \, B a b^{3} c^{2} d^{2} + 3 \, B a^{2} b^{2} c d^{3} - B a^{3} b d^{4}\right )} i x + {\left (3 \, B b^{4} c^{4} - 8 \, B a b^{3} c^{3} d + 6 \, B a^{2} b^{2} c^{2} d^{2} - B a^{4} d^{4}\right )} i\right )} \log \left (e\right ) + 12 \, {\left (B b^{4} d^{4} i n x^{4} + 4 \, B a b^{3} d^{4} i n x^{3} + 6 \, B a^{2} b^{2} d^{4} i n x^{2} + 4 \, {\left (B b^{4} c^{3} d - 3 \, B a b^{3} c^{2} d^{2} + 3 \, B a^{2} b^{2} c d^{3}\right )} i n x + {\left (3 \, B b^{4} c^{4} - 8 \, B a b^{3} c^{3} d + 6 \, B a^{2} b^{2} c^{2} d^{2}\right )} i n\right )} \log \left (\frac {b x + a}{d x + c}\right )}{144 \, {\left ({\left (b^{9} c^{3} - 3 \, a b^{8} c^{2} d + 3 \, a^{2} b^{7} c d^{2} - a^{3} b^{6} d^{3}\right )} g^{5} x^{4} + 4 \, {\left (a b^{8} c^{3} - 3 \, a^{2} b^{7} c^{2} d + 3 \, a^{3} b^{6} c d^{2} - a^{4} b^{5} d^{3}\right )} g^{5} x^{3} + 6 \, {\left (a^{2} b^{7} c^{3} - 3 \, a^{3} b^{6} c^{2} d + 3 \, a^{4} b^{5} c d^{2} - a^{5} b^{4} d^{3}\right )} g^{5} x^{2} + 4 \, {\left (a^{3} b^{6} c^{3} - 3 \, a^{4} b^{5} c^{2} d + 3 \, a^{5} b^{4} c d^{2} - a^{6} b^{3} d^{3}\right )} g^{5} x + {\left (a^{4} b^{5} c^{3} - 3 \, a^{5} b^{4} c^{2} d + 3 \, a^{6} b^{3} c d^{2} - a^{7} b^{2} d^{3}\right )} g^{5}\right )}} \]

[In]

integrate((d*i*x+c*i)*(A+B*log(e*((b*x+a)/(d*x+c))^n))/(b*g*x+a*g)^5,x, algorithm="fricas")

[Out]

-1/144*(12*(B*b^4*c*d^3 - B*a*b^3*d^4)*i*n*x^3 - 6*(B*b^4*c^2*d^2 - 8*B*a*b^3*c*d^3 + 7*B*a^2*b^2*d^4)*i*n*x^2
+ (9*B*b^4*c^4 - 32*B*a*b^3*c^3*d + 36*B*a^2*b^2*c^2*d^2 - 13*B*a^4*d^4)*i*n + 12*(3*A*b^4*c^4 - 8*A*a*b^3*c^
3*d + 6*A*a^2*b^2*c^2*d^2 - A*a^4*d^4)*i + 4*((B*b^4*c^3*d - 6*B*a*b^3*c^2*d^2 + 18*B*a^2*b^2*c*d^3 - 13*B*a^3
*b*d^4)*i*n + 12*(A*b^4*c^3*d - 3*A*a*b^3*c^2*d^2 + 3*A*a^2*b^2*c*d^3 - A*a^3*b*d^4)*i)*x + 12*(4*(B*b^4*c^3*d
- 3*B*a*b^3*c^2*d^2 + 3*B*a^2*b^2*c*d^3 - B*a^3*b*d^4)*i*x + (3*B*b^4*c^4 - 8*B*a*b^3*c^3*d + 6*B*a^2*b^2*c^2
*d^2 - B*a^4*d^4)*i)*log(e) + 12*(B*b^4*d^4*i*n*x^4 + 4*B*a*b^3*d^4*i*n*x^3 + 6*B*a^2*b^2*d^4*i*n*x^2 + 4*(B*b
^4*c^3*d - 3*B*a*b^3*c^2*d^2 + 3*B*a^2*b^2*c*d^3)*i*n*x + (3*B*b^4*c^4 - 8*B*a*b^3*c^3*d + 6*B*a^2*b^2*c^2*d^2
)*i*n)*log((b*x + a)/(d*x + c)))/((b^9*c^3 - 3*a*b^8*c^2*d + 3*a^2*b^7*c*d^2 - a^3*b^6*d^3)*g^5*x^4 + 4*(a*b^8
*c^3 - 3*a^2*b^7*c^2*d + 3*a^3*b^6*c*d^2 - a^4*b^5*d^3)*g^5*x^3 + 6*(a^2*b^7*c^3 - 3*a^3*b^6*c^2*d + 3*a^4*b^5
*c*d^2 - a^5*b^4*d^3)*g^5*x^2 + 4*(a^3*b^6*c^3 - 3*a^4*b^5*c^2*d + 3*a^5*b^4*c*d^2 - a^6*b^3*d^3)*g^5*x + (a^4
*b^5*c^3 - 3*a^5*b^4*c^2*d + 3*a^6*b^3*c*d^2 - a^7*b^2*d^3)*g^5)

Sympy [F(-1)]

Timed out. \[ \int \frac {(c i+d i x) \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{(a g+b g x)^5} \, dx=\text {Timed out} \]

[In]

integrate((d*i*x+c*i)*(A+B*ln(e*((b*x+a)/(d*x+c))**n))/(b*g*x+a*g)**5,x)

[Out]

Timed out

Maxima [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 1398 vs. \(2 (269) = 538\).

Time = 0.25 (sec) , antiderivative size = 1398, normalized size of antiderivative = 4.98 \[ \int \frac {(c i+d i x) \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{(a g+b g x)^5} \, dx=\text {Too large to display} \]

[In]

integrate((d*i*x+c*i)*(A+B*log(e*((b*x+a)/(d*x+c))^n))/(b*g*x+a*g)^5,x, algorithm="maxima")

[Out]

1/48*B*c*i*n*((12*b^3*d^3*x^3 - 3*b^3*c^3 + 13*a*b^2*c^2*d - 23*a^2*b*c*d^2 + 25*a^3*d^3 - 6*(b^3*c*d^2 - 7*a*
b^2*d^3)*x^2 + 4*(b^3*c^2*d - 5*a*b^2*c*d^2 + 13*a^2*b*d^3)*x)/((b^8*c^3 - 3*a*b^7*c^2*d + 3*a^2*b^6*c*d^2 - a
^3*b^5*d^3)*g^5*x^4 + 4*(a*b^7*c^3 - 3*a^2*b^6*c^2*d + 3*a^3*b^5*c*d^2 - a^4*b^4*d^3)*g^5*x^3 + 6*(a^2*b^6*c^3
- 3*a^3*b^5*c^2*d + 3*a^4*b^4*c*d^2 - a^5*b^3*d^3)*g^5*x^2 + 4*(a^3*b^5*c^3 - 3*a^4*b^4*c^2*d + 3*a^5*b^3*c*d
^2 - a^6*b^2*d^3)*g^5*x + (a^4*b^4*c^3 - 3*a^5*b^3*c^2*d + 3*a^6*b^2*c*d^2 - a^7*b*d^3)*g^5) + 12*d^4*log(b*x
+ a)/((b^5*c^4 - 4*a*b^4*c^3*d + 6*a^2*b^3*c^2*d^2 - 4*a^3*b^2*c*d^3 + a^4*b*d^4)*g^5) - 12*d^4*log(d*x + c)/(
(b^5*c^4 - 4*a*b^4*c^3*d + 6*a^2*b^3*c^2*d^2 - 4*a^3*b^2*c*d^3 + a^4*b*d^4)*g^5)) - 1/144*B*d*i*n*((7*a*b^3*c^
3 - 33*a^2*b^2*c^2*d + 75*a^3*b*c*d^2 - 13*a^4*d^3 + 12*(4*b^4*c*d^2 - a*b^3*d^3)*x^3 - 6*(4*b^4*c^2*d - 29*a*
b^3*c*d^2 + 7*a^2*b^2*d^3)*x^2 + 4*(4*b^4*c^3 - 21*a*b^3*c^2*d + 57*a^2*b^2*c*d^2 - 13*a^3*b*d^3)*x)/((b^9*c^3
- 3*a*b^8*c^2*d + 3*a^2*b^7*c*d^2 - a^3*b^6*d^3)*g^5*x^4 + 4*(a*b^8*c^3 - 3*a^2*b^7*c^2*d + 3*a^3*b^6*c*d^2 -
a^4*b^5*d^3)*g^5*x^3 + 6*(a^2*b^7*c^3 - 3*a^3*b^6*c^2*d + 3*a^4*b^5*c*d^2 - a^5*b^4*d^3)*g^5*x^2 + 4*(a^3*b^6
*c^3 - 3*a^4*b^5*c^2*d + 3*a^5*b^4*c*d^2 - a^6*b^3*d^3)*g^5*x + (a^4*b^5*c^3 - 3*a^5*b^4*c^2*d + 3*a^6*b^3*c*d
^2 - a^7*b^2*d^3)*g^5) + 12*(4*b*c*d^3 - a*d^4)*log(b*x + a)/((b^6*c^4 - 4*a*b^5*c^3*d + 6*a^2*b^4*c^2*d^2 - 4
*a^3*b^3*c*d^3 + a^4*b^2*d^4)*g^5) - 12*(4*b*c*d^3 - a*d^4)*log(d*x + c)/((b^6*c^4 - 4*a*b^5*c^3*d + 6*a^2*b^4
*c^2*d^2 - 4*a^3*b^3*c*d^3 + a^4*b^2*d^4)*g^5)) - 1/12*(4*b*x + a)*B*d*i*log(e*(b*x/(d*x + c) + a/(d*x + c))^n
)/(b^6*g^5*x^4 + 4*a*b^5*g^5*x^3 + 6*a^2*b^4*g^5*x^2 + 4*a^3*b^3*g^5*x + a^4*b^2*g^5) - 1/12*(4*b*x + a)*A*d*i
/(b^6*g^5*x^4 + 4*a*b^5*g^5*x^3 + 6*a^2*b^4*g^5*x^2 + 4*a^3*b^3*g^5*x + a^4*b^2*g^5) - 1/4*B*c*i*log(e*(b*x/(d
*x + c) + a/(d*x + c))^n)/(b^5*g^5*x^4 + 4*a*b^4*g^5*x^3 + 6*a^2*b^3*g^5*x^2 + 4*a^3*b^2*g^5*x + a^4*b*g^5) -
1/4*A*c*i/(b^5*g^5*x^4 + 4*a*b^4*g^5*x^3 + 6*a^2*b^3*g^5*x^2 + 4*a^3*b^2*g^5*x + a^4*b*g^5)

Giac [A] (verification not implemented)

none

Time = 1.36 (sec) , antiderivative size = 394, normalized size of antiderivative = 1.40 \[ \int \frac {(c i+d i x) \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{(a g+b g x)^5} \, dx=-\frac {1}{144} \, {\left (\frac {12 \, {\left (3 \, B b^{2} i n - \frac {8 \, {\left (b x + a\right )} B b d i n}{d x + c} + \frac {6 \, {\left (b x + a\right )}^{2} B d^{2} i n}{{\left (d x + c\right )}^{2}}\right )} \log \left (\frac {b x + a}{d x + c}\right )}{\frac {{\left (b x + a\right )}^{4} b^{2} c^{2} g^{5}}{{\left (d x + c\right )}^{4}} - \frac {2 \, {\left (b x + a\right )}^{4} a b c d g^{5}}{{\left (d x + c\right )}^{4}} + \frac {{\left (b x + a\right )}^{4} a^{2} d^{2} g^{5}}{{\left (d x + c\right )}^{4}}} + \frac {9 \, B b^{2} i n - \frac {32 \, {\left (b x + a\right )} B b d i n}{d x + c} + \frac {36 \, {\left (b x + a\right )}^{2} B d^{2} i n}{{\left (d x + c\right )}^{2}} + 36 \, B b^{2} i \log \left (e\right ) - \frac {96 \, {\left (b x + a\right )} B b d i \log \left (e\right )}{d x + c} + \frac {72 \, {\left (b x + a\right )}^{2} B d^{2} i \log \left (e\right )}{{\left (d x + c\right )}^{2}} + 36 \, A b^{2} i - \frac {96 \, {\left (b x + a\right )} A b d i}{d x + c} + \frac {72 \, {\left (b x + a\right )}^{2} A d^{2} i}{{\left (d x + c\right )}^{2}}}{\frac {{\left (b x + a\right )}^{4} b^{2} c^{2} g^{5}}{{\left (d x + c\right )}^{4}} - \frac {2 \, {\left (b x + a\right )}^{4} a b c d g^{5}}{{\left (d x + c\right )}^{4}} + \frac {{\left (b x + a\right )}^{4} a^{2} d^{2} g^{5}}{{\left (d x + c\right )}^{4}}}\right )} {\left (\frac {b c}{{\left (b c - a d\right )}^{2}} - \frac {a d}{{\left (b c - a d\right )}^{2}}\right )} \]

[In]

integrate((d*i*x+c*i)*(A+B*log(e*((b*x+a)/(d*x+c))^n))/(b*g*x+a*g)^5,x, algorithm="giac")

[Out]

-1/144*(12*(3*B*b^2*i*n - 8*(b*x + a)*B*b*d*i*n/(d*x + c) + 6*(b*x + a)^2*B*d^2*i*n/(d*x + c)^2)*log((b*x + a)
/(d*x + c))/((b*x + a)^4*b^2*c^2*g^5/(d*x + c)^4 - 2*(b*x + a)^4*a*b*c*d*g^5/(d*x + c)^4 + (b*x + a)^4*a^2*d^2
*g^5/(d*x + c)^4) + (9*B*b^2*i*n - 32*(b*x + a)*B*b*d*i*n/(d*x + c) + 36*(b*x + a)^2*B*d^2*i*n/(d*x + c)^2 + 3
6*B*b^2*i*log(e) - 96*(b*x + a)*B*b*d*i*log(e)/(d*x + c) + 72*(b*x + a)^2*B*d^2*i*log(e)/(d*x + c)^2 + 36*A*b^
2*i - 96*(b*x + a)*A*b*d*i/(d*x + c) + 72*(b*x + a)^2*A*d^2*i/(d*x + c)^2)/((b*x + a)^4*b^2*c^2*g^5/(d*x + c)^
4 - 2*(b*x + a)^4*a*b*c*d*g^5/(d*x + c)^4 + (b*x + a)^4*a^2*d^2*g^5/(d*x + c)^4))*(b*c/(b*c - a*d)^2 - a*d/(b*
c - a*d)^2)

Mupad [B] (verification not implemented)

Time = 2.43 (sec) , antiderivative size = 610, normalized size of antiderivative = 2.17 \[ \int \frac {(c i+d i x) \left (A+B \log \left (e \left (\frac {a+b x}{c+d x}\right )^n\right )\right )}{(a g+b g x)^5} \, dx=\frac {B\,d^4\,i\,n\,\mathrm {atanh}\left (\frac {12\,a^3\,b^2\,d^3\,g^5-12\,a^2\,b^3\,c\,d^2\,g^5-12\,a\,b^4\,c^2\,d\,g^5+12\,b^5\,c^3\,g^5}{12\,b^2\,g^5\,{\left (a\,d-b\,c\right )}^3}+\frac {2\,b\,d\,x\,\left (a^2\,d^2-2\,a\,b\,c\,d+b^2\,c^2\right )}{{\left (a\,d-b\,c\right )}^3}\right )}{6\,b^2\,g^5\,{\left (a\,d-b\,c\right )}^3}-\frac {\ln \left (e\,{\left (\frac {a+b\,x}{c+d\,x}\right )}^n\right )\,\left (\frac {B\,c\,i}{4\,b}+\frac {B\,a\,d\,i}{12\,b^2}+\frac {B\,d\,i\,x}{3\,b}\right )}{a^4\,g^5+4\,a^3\,b\,g^5\,x+6\,a^2\,b^2\,g^5\,x^2+4\,a\,b^3\,g^5\,x^3+b^4\,g^5\,x^4}-\frac {\frac {12\,A\,a^3\,d^3\,i+36\,A\,b^3\,c^3\,i+13\,B\,a^3\,d^3\,i\,n+9\,B\,b^3\,c^3\,i\,n-60\,A\,a\,b^2\,c^2\,d\,i+12\,A\,a^2\,b\,c\,d^2\,i-23\,B\,a\,b^2\,c^2\,d\,i\,n+13\,B\,a^2\,b\,c\,d^2\,i\,n}{12\,\left (a^2\,d^2-2\,a\,b\,c\,d+b^2\,c^2\right )}+\frac {x\,\left (12\,A\,a^2\,b\,d^3\,i+12\,A\,b^3\,c^2\,d\,i-24\,A\,a\,b^2\,c\,d^2\,i+13\,B\,a^2\,b\,d^3\,i\,n+B\,b^3\,c^2\,d\,i\,n-5\,B\,a\,b^2\,c\,d^2\,i\,n\right )}{3\,\left (a^2\,d^2-2\,a\,b\,c\,d+b^2\,c^2\right )}-\frac {d\,x^2\,\left (B\,b^3\,c\,d\,i\,n-7\,B\,a\,b^2\,d^2\,i\,n\right )}{2\,\left (a^2\,d^2-2\,a\,b\,c\,d+b^2\,c^2\right )}+\frac {B\,b^3\,d^3\,i\,n\,x^3}{a^2\,d^2-2\,a\,b\,c\,d+b^2\,c^2}}{12\,a^4\,b^2\,g^5+48\,a^3\,b^3\,g^5\,x+72\,a^2\,b^4\,g^5\,x^2+48\,a\,b^5\,g^5\,x^3+12\,b^6\,g^5\,x^4} \]

[In]

int(((c*i + d*i*x)*(A + B*log(e*((a + b*x)/(c + d*x))^n)))/(a*g + b*g*x)^5,x)

[Out]

(B*d^4*i*n*atanh((12*b^5*c^3*g^5 + 12*a^3*b^2*d^3*g^5 - 12*a*b^4*c^2*d*g^5 - 12*a^2*b^3*c*d^2*g^5)/(12*b^2*g^5
*(a*d - b*c)^3) + (2*b*d*x*(a^2*d^2 + b^2*c^2 - 2*a*b*c*d))/(a*d - b*c)^3))/(6*b^2*g^5*(a*d - b*c)^3) - (log(e
*((a + b*x)/(c + d*x))^n)*((B*c*i)/(4*b) + (B*a*d*i)/(12*b^2) + (B*d*i*x)/(3*b)))/(a^4*g^5 + b^4*g^5*x^4 + 4*a
*b^3*g^5*x^3 + 6*a^2*b^2*g^5*x^2 + 4*a^3*b*g^5*x) - ((12*A*a^3*d^3*i + 36*A*b^3*c^3*i + 13*B*a^3*d^3*i*n + 9*B
*b^3*c^3*i*n - 60*A*a*b^2*c^2*d*i + 12*A*a^2*b*c*d^2*i - 23*B*a*b^2*c^2*d*i*n + 13*B*a^2*b*c*d^2*i*n)/(12*(a^2
*d^2 + b^2*c^2 - 2*a*b*c*d)) + (x*(12*A*a^2*b*d^3*i + 12*A*b^3*c^2*d*i - 24*A*a*b^2*c*d^2*i + 13*B*a^2*b*d^3*i
*n + B*b^3*c^2*d*i*n - 5*B*a*b^2*c*d^2*i*n))/(3*(a^2*d^2 + b^2*c^2 - 2*a*b*c*d)) - (d*x^2*(B*b^3*c*d*i*n - 7*B
*a*b^2*d^2*i*n))/(2*(a^2*d^2 + b^2*c^2 - 2*a*b*c*d)) + (B*b^3*d^3*i*n*x^3)/(a^2*d^2 + b^2*c^2 - 2*a*b*c*d))/(1
2*a^4*b^2*g^5 + 12*b^6*g^5*x^4 + 48*a^3*b^3*g^5*x + 48*a*b^5*g^5*x^3 + 72*a^2*b^4*g^5*x^2)